<?php


namespace EchoPHP\Support;


use ArrayAccess;
use EchoPHP\Support\Traits\Macroable;
use Closure;

class Arr {

    use Macroable;

    /**
     * 判断给定的值是否可以像数组一样使用
     * @param $value
     * @return bool
     */
    public static function accessible($value) {
        return is_array($value) || $value instanceof ArrayAccess;
    }

    /**
     * 判断数组元素是否存在
     * @param $array
     * @param $key
     * @return bool
     */
    public static function exists($array, $key) {
        if ($array instanceof ArrayAccess) {
            return $array->offsetExists($key);
        }
        return array_key_exists($key, $array);
    }

    /**
     * 从数组元素中根据键名获取键值
     * @param $array
     * @param $key
     * @param null $default
     * @return mixed
     */
    public static function get($array, $key, $default = null) {
        if (!static::accessible($array)) {
            return static::getDefaultValue($default);
        }
        if (is_null($key)) {
            return $array;
        }
        if (static::exists($array, $key)) {
            return $array[$key];
        }
        if (strpos($key, '.') === false) {
            return self::getDefaultValue($default);
        }
        foreach (explode('.', $key) as $segment) {
            if (static::accessible($array) && static::exists($array, $segment)) {
                $array = $array[$segment];
            } else {
                return static::getDefaultValue($default);
            }
        }
        return $array;
    }

    /**
     * 如果数组元素不存在，则添加一个新元素
     * @param $array
     * @param $key
     * @param $value
     * @return mixed
     */
    public static function add($array, $key, $value) {
        if (is_null(static::get($array, $key))) {
            static::set($array, $key, $value);
        }
        return $array;
    }

    /**
     * 多个数组取交叉集合，返回所有的排列组合情况
     * [a, b] [a, c] [d, f]  去除结果如下： 共 2 * 2 * 2 = 8 种情况
     * aad  aaf acd acf bad baf bcd bcf
     * @param mixed ...$arrays
     * @return array
     */
    public static function crossJoin(...$arrays) {
        $results = [[]];
        foreach ($arrays as $index => $array) {
            $append = [];
            foreach ($results as $product) {
                foreach ($array as $item) {
                    $product[$index] = $item;
                    $append[] = $product;
                }
            }
            $results = $append;
        }
        return $results;
    }

    /**
     * 将二维数组合并为一维数组，相同键名覆盖
     * @param $array
     * @return array
     *
     */
    public static function collapse($array) {
        $results = [];
        foreach ($array as $values) {
            if ($values instanceof Collection) {
                $values = $values->all();
            } elseif (!is_array($values)) {
                continue;
            }

            $results = array_merge($results, $values);
        }
        return $results;
    }

    /**
     * 为数组元素设置值
     * @param $array
     * @param $key
     * @param $value
     * @return mixed
     */
    public static function set(&$array, $key, $value) {
        if (is_null($key)) {
            return $array = $value;
        }
        $keys = explode('.', $key);

        while (count($keys) > 1) {
            $key = array_shift($keys);
            if (!isset($array[$key]) || !is_array($array[$key])) {
                $array[$key] = [];
            }

            $array = &$array[$key];
        }
        $array[array_shift($keys)] = $value;
        return $array;
    }

    /**
     * 向数组集合开头添加一个新元素
     * @param $array
     * @param $value
     * @param null $key
     * @return array
     */
    public static function prepend($array, $value, $key = null) {
        if (is_null($key)) {
            array_unshift($array, $value);
        } else {
            $array = [$key => $value] + $array;
        }
        return $array;
    }

    /**
     * 从数组集合中推出一个元素
     * @param $array
     * @param $key
     * @param null $default
     * @return mixed
     */
    public static function pull(&$array, $key, $default = null) {
        $value = static::get($array, $key, $default);
        static::remove($array, $key);
        return $value;
    }

    /**
     * 从数组中随机获取几个元素
     * @param $array
     * @param int $number
     * @return array
     */
    public static function random($array, $number = 1) {
        $number = (int)$number;
        $number = $number > 1 ? $number : 1;
        $count = count($array);
        $number = $number > $count ? $count : $number;

        $keys = array_rand($array, $number);
        $results = [];
        foreach ((array)$keys as $key) {
            $results[] = $array[$key];
        }
        return $results;
    }

    /**
     * 打乱数组顺序
     * @param $array
     * @param null $seed 随机数发生器种子
     * @return mixed
     */
    public static function shuffle($array, $seed = null) {
        if (is_null($seed)) {
            shuffle($array);
        } else {
            mt_srand($seed);
            shuffle($array);
            mt_srand();
        }

        return $array;
    }

    /**
     * 分离数组的键名键值
     * @param $array
     * @return array
     */
    public static function divide($array) {
        return [array_keys($array), array_values($array)];
    }

    /**
     * 将多维数组进行合并, 根据depth决定合并层次，数字下表
     * 如一个三维数组，depth = 1  那么就将二维数组整理到一维上，最终实际是一个一维数组
     * @param $array
     * @param int $depth INF 无穷大
     * @return array
     */
    public static function flatten($array, $depth = INF) {
        $result = [];
        foreach ($array as $item) {
            $item = $item instanceof Collection ? $item->all() : $item;

            if (!is_array($item)) {
                $result[] = $item;
            } elseif ($depth == 1) {
                $result = array_merge($result, array_values($item));
            } else {
                $result = array_merge($result, static::flatten($item, $depth - 1));
            }
        }

        return $result;
    }

    /**
     * 将多维数组整合成一维数组，用 dot 连接的键名下标
     * @param $array
     * @param string $prepend
     * @return array
     */
    public static function flattenWithDot($array, $prepend = '') {
        $results = [];
        foreach ($array as $key => $value) {
            if (is_array($value) && !empty($value)) {
                $results = array_merge($results, static::flattenWithDot($value, $prepend . $key . '.'));
            } else {
                $results[$prepend . $key] = $value;
            }
        }
        return $results;
    }

    /**
     * 从数组集合中删除元素
     * @param $array
     * @param $keys
     */
    public static function remove(&$array, $keys) {
        $original = &$array;
        $keys = (array)$keys;
        if (empty($keys)) {
            return;
        }
        foreach ($keys as $key) {
            if (static::exists($array, $key)) {
                unset($array[$key]);
                continue;
            }
            $parts = explode('.', $key);
            $array = &$original;
            while (count($parts) > 1) {
                $part = array_shift($parts);
                if (isset($array[$part]) && is_array($array[$part])) {
                    $array = &$array[$part];
                } else {
                    continue 2;
                }
            }
            unset($array[array_shift($parts)]);
        }
    }

    /**
     * 判断数组元素集合中是否存在给定的键名
     * @param $array
     * @param $keys
     * @return bool
     */
    public static function has($array, $keys) {
        $keys = (array)$keys;
        if (!static::accessible($array) || empty($keys)) {
            return false;
        }
        foreach ($keys as $key) {
            $subKeyArray = $array;
            if (static::exists($array, $key)) {
                continue;
            }
            foreach (explode('.', $key) as $segment) {
                if (static::accessible($subKeyArray) && static::exists($subKeyArray, $segment)) {
                    $subKeyArray = $subKeyArray[$segment];
                } else {
                    return false;
                }
            }
        }
        return true;
    }

    /**
     * 返回数组的第一个元素，可以使用回调函数进行匹配
     * @param $array
     * @param callable|null $callback
     * @param null $default
     * @return mixed|null
     */
    public static function first($array, callable $callback = null, $default = null) {
        if (is_null($callback)) {
            return empty($array) ? static::getDefaultValue($default) : reset($array);
        }
        foreach ($array as $key => $value) {
            if (call_user_func($callback, $value, $key)) {
                return $value;
            }
        }
        return static::getDefaultValue($default);
    }

    /**
     * 获取数组的最后一个元素
     * @param $array
     * @param callable|null $callback
     * @param null $default
     * @return mixed|null
     */
    public static function last($array, callable $callback = null, $default = null) {
        if (is_null($callback)) {
            return empty($array) ? static::getDefaultValue($default) : end($array);
        }
        return static::first(array_reverse($array, true), $callback, $default);
    }

    /**
     * 获取数组集合中指定键名的键值
     * @param $array
     * @param $keys
     * @return array
     */
    public static function only($array, $keys) {
        //array_flip  翻转数组的键名键值 array_intersect_key  返回两个数组键名交集元素
        return array_intersect_key($array, array_flip((array)$keys));
    }

    /**
     * 获取除了指定键名外的全部数组集合
     * @param $array
     * @param $keys
     * @return mixed
     */
    public static function except($array, $keys) {
        static::remove($array, $keys);
        return $array;
    }

    /**
     * 判断是否是关联数组
     * @param array $array
     * @return bool
     */
    public static function isAssoc(array $array) {
        $keys = array_keys($array);
        return array_keys($keys) !== $keys;
    }

    /**
     * 将数组构建为 url中query_string 格式的字符串
     * @param $array
     * @return string
     */
    public static function query($array) {
        return http_build_query($array, null, '&', PHP_QUERY_RFC3986);
    }

    /**
     * 使用回调函数过滤数组
     * @param $array
     * @param callable $callback
     * @return array
     */
    public static function filter($array, callable $callback) {
        return array_filter($array, $callback, ARRAY_FILTER_USE_BOTH);
    }

    /**
     * 执行数组排序
     * @param $array
     * @param null $callback
     * @return array|mixed
     */
    public static function sort($array, $callback = null) {
        return Collection::make($array)->sortBy($callback)->all();
    }

    /**
     * 将一个数值包裹为数组，如果已经是数组则不操作
     * @param $value
     * @return array
     */
    public static function wrap($value) {
        if (is_null($value)) {
            return [];
        }
        return is_array($value) ? $value : [$value];
    }

    /**
     * 循环排序数组
     * @param $array
     * @return mixed
     */
    public static function sortRecursive($array) {
        foreach ($array as &$value) {
            if (is_array($value)) {
                $value = static::sortRecursive($value);
            }
        }
        if (static::isAssoc($array)) {
            ksort($array);
        } else {
            sort($array);
        }
        return $array;
    }

    /**
     * 获取默认值，如果传入闭包，则通过该闭包获取
     * @param $value
     * @return mixed
     */
    public static function getDefaultValue($value) {
        return $value instanceof Closure ? $value() : $value;
    }

    /**
     * 数组转码
     * @param $arr
     * @param $outCharset
     * @param null $inCharset
     */
    public static function convertCharset(&$arr, $outCharset, $inCharset = null) {
        if (!is_array($arr)) {
            return;
        }
        foreach ($arr as &$item) {
            if (is_array($item)) {
                self::convertCharset($item, $outCharset, $inCharset);
            } else {
                $item = Str::convertCharset($item, $outCharset, $inCharset);
            }
        }
    }

}